Fixed a small bug in the last checkin.

diff --git a/lisp/mh-e/mh-comp.el b/lisp/mh-e/mh-comp.el
index f7a610e6c586a23120dc0cc0ff9b7808489468b9..6c8ac6c6e7e516fb4ed4129c924999f492ba49c8 100644 (file)
--- a/lisp/mh-e/mh-comp.el
+++ b/lisp/mh-e/mh-comp.el
@@ -1140,7 +1140,7 @@ added; otherwise return nil."
           (while list
             (let ((regexp (nth 0 (car list)))
                   (entries (nth 1 (car list))))
-              (when (mh-regexp-in-field-p regexp mh-addr-syntax-table "To:" "cc:")
+              (when (mh-regexp-in-field-p regexp "To:" "cc:")
                 (setq mh-insert-auto-fields-done-local t)
                 (setq fields-inserted t)
                 (if (not non-interactive)